home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 1998 November / IRIX 6.5.2 Base Documentation November 1998.img / usr / share / catman / p_man / cat3 / complib / cpocon.z / cpocon
Text File  |  1998-10-30  |  3KB  |  133 lines
  1.  
  2.  
  3.  
  4. CCCCPPPPOOOOCCCCOOOONNNN((((3333FFFF))))                                                          CCCCPPPPOOOOCCCCOOOONNNN((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      CPOCON - estimate the reciprocal of the condition number (in the 1-norm)
  10.      of a complex Hermitian positive definite matrix using the Cholesky
  11.      factorization A = U**H*U or A = L*L**H computed by CPOTRF
  12.  
  13. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  14.      SUBROUTINE CPOCON( UPLO, N, A, LDA, ANORM, RCOND, WORK, RWORK, INFO )
  15.  
  16.          CHARACTER      UPLO
  17.  
  18.          INTEGER        INFO, LDA, N
  19.  
  20.          REAL           ANORM, RCOND
  21.  
  22.          REAL           RWORK( * )
  23.  
  24.          COMPLEX        A( LDA, * ), WORK( * )
  25.  
  26. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  27.      CPOCON estimates the reciprocal of the condition number (in the 1-norm)
  28.      of a complex Hermitian positive definite matrix using the Cholesky
  29.      factorization A = U**H*U or A = L*L**H computed by CPOTRF.
  30.  
  31.      An estimate is obtained for norm(inv(A)), and the reciprocal of the
  32.      condition number is computed as RCOND = 1 / (ANORM * norm(inv(A))).
  33.  
  34.  
  35. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  36.      UPLO    (input) CHARACTER*1
  37.              = 'U':  Upper triangle of A is stored;
  38.              = 'L':  Lower triangle of A is stored.
  39.  
  40.      N       (input) INTEGER
  41.              The order of the matrix A.  N >= 0.
  42.  
  43.      A       (input) COMPLEX array, dimension (LDA,N)
  44.              The triangular factor U or L from the Cholesky factorization A =
  45.              U**H*U or A = L*L**H, as computed by CPOTRF.
  46.  
  47.      LDA     (input) INTEGER
  48.              The leading dimension of the array A.  LDA >= max(1,N).
  49.  
  50.      ANORM   (input) REAL
  51.              The 1-norm (or infinity-norm) of the Hermitian matrix A.
  52.  
  53.      RCOND   (output) REAL
  54.              The reciprocal of the condition number of the matrix A, computed
  55.              as RCOND = 1/(ANORM * AINVNM), where AINVNM is an estimate of the
  56.              1-norm of inv(A) computed in this routine.
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. CCCCPPPPOOOOCCCCOOOONNNN((((3333FFFF))))                                                          CCCCPPPPOOOOCCCCOOOONNNN((((3333FFFF))))
  71.  
  72.  
  73.  
  74.      WORK    (workspace) COMPLEX array, dimension (2*N)
  75.  
  76.      RWORK   (workspace) REAL array, dimension (N)
  77.  
  78.      INFO    (output) INTEGER
  79.              = 0:  successful exit
  80.              < 0:  if INFO = -i, the i-th argument had an illegal value
  81.  
  82.  
  83.  
  84.  
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.